home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 February / Macworld (1999-02).dmg / Games World / SharewareGames / Xconq 7.2.2 / lib / duel.g < prev    next >
Text File  |  1998-05-22  |  705b  |  55 lines
  1. (game-module "duel"
  2.   (title "The Duel")
  3.   (blurb "Tanks, one-on-one.")
  4.   (base-module "tank")
  5.   (variants
  6.    (see-all true)
  7.    (sequential true)
  8.    ("More Tanks" more (true (add u* start-with 1)))
  9.    ) 
  10. )
  11.  
  12. (area 20 20)
  13.  
  14. (area (terrain (by-name "+" plains)
  15.   "20+"
  16.   "20+"
  17.   "20+"
  18.   "20+"
  19.   "20+"
  20.   "20+"
  21.   "20+"
  22.   "20+"
  23.   "20+"
  24.   "20+"
  25.   "20+"
  26.   "20+"
  27.   "20+"
  28.   "20+"
  29.   "20+"
  30.   "20+"
  31.   "20+"
  32.   "20+"
  33.   "20+"
  34.   "20+"
  35. ))
  36.  
  37. ;; Limit to two players only.
  38.  
  39. (set sides-min 2)
  40. (set sides-max 2)
  41.  
  42. ;; Two sides, no special properties needed (?).
  43.  
  44. (side 1)
  45.  
  46. (side 2)
  47.  
  48. ;; Two tanks, one for each side, at predetermined locations.
  49.  
  50. (tank 10  7 1)
  51.  
  52. (tank 10 13 2)
  53.  
  54. (scorekeeper (when after-event) (do last-side-wins))
  55.